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PREFACE 



This manual describes Intel's 8080/8085 Floating-Point Arithmetic Library (FPAL) and 
its use. The FPAL extends the capabilities of programs written for the 8080 and 8085 
microcomputers. You can incorporate various floating-point operations into your 
8080/8085 assembly-language or PL/M-80 program using simple procedure calls. 

The manual includes programming examples in both languages, but assumes you already 
know how to use at least one of them. Programming information can be found in the 
following manuals. 

8080/8085 Assembly Language: 

8080/8085 Assembly Language Programming Manual 9800301 
ISIS-II 8080/8085 Assembler Operator's Manual 9800292 

PL/M-80: 

PL/M-80 Programming Manual 

ISIS-II PL/M-80 Compiler Operator's Manual 9800300 
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CHAPTER 1 
INTRODUCTION 



The FPAL can be used by assembly language or PL/M programs. The FPAL procedures 
reside in an ISIS-II library (FPAL.LIB) in object code form. They are self contained and 
can be used in component, OEM-board, or Intellec Microcomputer Development System 
environments. 



What is FPAL? I 

The Floating-Point Arithmetic Library (FPAL) contains basic floating-point subroutines 
and functions (referred to generically as 'procedures'). The operations provided are 
addition, subtraction, multiplication, division, value comparison, conversion between 
decimal and binary floating-point number representations, and conversion between 
floating-point and 32-bit signed integer formats. All operations are single precision 
(positive number range approximates 1.2xl0" 38 to 3.4xl0 38 ). The single-precision 
format is described below and in Appendix B. 

In addition to these operations, a number of procedures are provided to deal with the 
Floating-Point Record (FPR). This is a reserved, 1 8-byte work area used to collect status 
and error information, and as an accumulator for intermediate results. The procedures 
supporting the FPR perform FPR initialization, change error-recovery options, check the 
contents of FPR fields, and pass numbers between the FPR and memory. 

The FPAL also includes a default error-handler subroutine. This subroutine is called when 
an invalid number is used in a floating-point operation or if overflow, underflow, or 
division by zero are not handled by an arithmetic subroutine. You may also write your ' 
own error handler, so long as it conforms to the formats described in this manual. 



I 



In general, the following steps must be observed to use the floating-point library: 

1 . An area of memory must be reserved, for the Floating-Point Record (FPR). 

2. The names of the FPAL procedures you plan to use must be declared to be 'external' ' 
(using the EXTRN directive in the ISIS-II 8080/8085 assembly language or the 
EXTERNAL attribute in PL/M-80). 

3. FPAL procedure references must be imbedded in your source code where appropriate. I 

4. The FPAL procedure used by your program must be linked to your object file. I 

All FPAL procedures are reentrant and conform to PL/M-80 linkage conventions. I 

If you plan to reference FPAL procedures in your program, your program cannot use 
symbols that are reserved for FPAL. To avoid using these symbols inadvertently, do not 
use symbolic names beginning with a 'commercial at' sign (@) or names whose second 
character is 'Q' or '?'. 



Single-Precision Numbers 



FPAL procedures operate on single-precision binary numbers, either in a 32-bit integer 
format or in a 32-bit floating-point format. 
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Integer Format 

The integer format recognized by the FPAL is a positive or negative (two's complement) 
32-bit binary number. The approximate range of this format is: 



Decimal 
+2.147 xlO 9 



+0 
-1 



-2.147 xlO 9 



Hexadecimal 
7FFFFFFF 



00000000 
FFFFFFFF 



80000000 



Floating-Point Format 

As an introduction to the single-precision floating-point format, consider the following 
representations of very small and very large decimal numbers. The decimal number base 
is used here to simplify the example. 



Fixed-Point 

6,373,000,000 
0.00074 



Scientific Notation 

6.373E+9 (6.373 x 10 9 ) 
7.4E^ (7.4X10" 4 ) 



The numbers in the two columns are equivalent. In the second column, the decimal point 
has been 'floated.' The exponent 'E' indicates the number of positions the decimal point 
was moved to the right or left to produce the abbreviated form shown. The numbers 
could have been written just as easily as '6373E+6' or '74E-5.' 

The 32-bit, binary floating-point format recognized by FPAL consists of three fields: 



sign 


exponent 


fraction 



1 bit 



8 bits 



23 bits 



The 'sign' field contains a zero if the number is non-negative and a one if the number is 
negative. 

The 'exponent' field corresponds to the 'E' notation in the example above and indicates 
the number of bit positions the integer form of the number must be shifted to put it in 
the form 'l.nnn . . . .' The value in the exponent field is offset by 2 7 - 1 (or 127). 

The 'fraction' field contains the 23 bits to the right of the most significant bit of the 
integer form of the number. A T bit is assumed at the left of the fraction if the exponent 
is nonzero and the binary point is between the assumed bit and the first explicit fraction 
bit 



Example : 



Integer Floating-Point 

00000001 (hexadecimal) 01111111 0000 ... 0000 

sign exp fraction 

or, in hexadecimal: 3F800000 
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The following lists make additional comparisons between decimal, binary integer, and 
binary floating-point representations. To save space, the internal binary representation is 
shown in hexadecimal form. 



Decimal 



1 
-1 

255 
-255 

1.07 xlO 9 
*3.37xl0 38 
*1.17xl0' 38 



approximately 



Binary Integer 

00000000 (hex) 

00000001 

FFFFFFFF 

000000FF 

FFFFFF01 

7FFFFF80 (note 1) 



Binary Floating-Point 

00000000 (hex) 
3F800000 
BF800000 
437F0000 
C37F0000 
4B7FFFFF 
7F7FFFFF (note 2) 
00800000 (note 3) 
40490FDB (tt) 
7FFFFFFF (+infinity) 
FFFFFFFF (-infinity) 



2. 
3. 



NOTES 

This is the largest number that can be converted to floating-point without losing 
accuracy. The precision of FPAL's floating-point format is slightly less than eight 
decimal digits. 

This is the largest number in the single-precision floating-point format. 

This is the smallest positive number in the single-precision floating-point format. 
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CHAPTER 2 
FLOATING-POINT RECORD PROCEDURES 



If you plan to use FPAL procedures, you must allocate 18 contiguous bytes of memory ' 
for the Floating-Point Record (FPR). The FPR format is described in detail in Appendix A. 
In general, it is divided into four fields: 

• Status field (1 byte). 

• Error-Handler Address field (2 bytes). This is the address of the error recovery 
subroutine. 

• Error field (2 bytes). 

• Floating-Point Accumulator, or FAC. This consists of a fraction field (11 bytes) and 
an exponent field (2 bytes). 

The remainder of this chapter describes the procedures used to initialize and access FPR 
fields. These procedures are : 

FSET A subroutine to initialize the FPR. ' 

FRESET A subroutine to reset the error-handling procedures and flags. ' 

FLOAD A subroutine to load a floating-point number from memory into the I 
Floating-Point Accumulator (FAC) field of the FPR. 

FSTOR A subroutine to store a floating-point number from the FAC into I 

memory. 

FSTAT A byte function that places the Status field of the FPR into the 8080's 

accumulator. 

FERROR An address function that places the Error field of the FPR into 8080 
registers H and L. 

The Floating-Point Record may be initialized and modified only by the procedures I 
described here. The FSET initialization subroutine must be called before any other 
procedures are used; otherwise, the results are undefined. ! 

These procedures save all 8080 registers, unless results are returned in the registers. I 

FSET— Initialize Floating-Point Record 

This subroutine completes initialization of the FPR. To initialize the FPR, you must: I 

1 . Push the address of the FPR onto the 8080 stack; 

2. Load register B with the error-handler indicator; load register C with the initial value 
for the Error field; 

3. Load registers D and E with the address of a user-defined error-handler subroutine, 
if necessary (see below); 

4. Call FSET. 
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Before FSET is called, registers B and C should contain initial values as shown in Figure 
2-1. The shaded bits shown in this figure are reserved for FPAL use and should always 
be set to zero. Ones in these bit fields currently cause undefined results. 
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EH 


IE 


OE 


UE 


ZE 


DE 





Figure 2-1 . Registers B, C Format for FSET 

The EH bit (register B) is interpreted as follows: 

EH = The default error handler (FERHND) is to be used; 

EH = 1 Your own error handler is to be used and its address must be found in 

registers D and E. 

If EH = 0, registers D and E are ignored. If EH = 1 , FSET loads the contents of registers 
D and E into the Error-Handler Address field of the FPR. 

NOTE 

FSET always links an error handler named FERHND, 
whether you specify your own error-handling sub- 
routine or not. If your own subroutine has the same 
name as the default subroutine, your error handler 
must appear before FPAL in the link list to ensure 
that your FERHND is linked instead of FPAL's. 

LINK MYPROG.OBJ, FERHND.OBJ, FPAL.LIB . . . 

FSET also clears the FAC and Status fields to zero and loads the contents of register C 
into the low-order byte of the Error field. See Appendix A for a detailed explanation of 
the register C bits. 

Examples: 

The following 8080 assembly-language sequence initializes the FPR and sets all bits in 
the Error field to zero. The example also assumes you are using the default error handler. 

; REGS B,C POINT TO FPR 
; PUSH FPR ADDRESS ONTO STACK 
; USE DEFAULT ERROR HANDLER AND SET 
; REG C (ERROR FIELD) TO ZEROS 
CALL FSET ; INITIALIZE FPR 

In PL/M-80, the same operations can be done with the statement 
CALL FSET(.FPR,0,0); 



LXI 


B,FPR 


PUSH 


B 


LXI 


B,0 



FRESET— Reset Error-Handling Procedure 

This subroutine is used to change the contents of the Error field or to specify that a 
different error handler be used. A common use of FRESET is to reset the five error flags 
in bits 3-7 of the Error field's low-order byte. 

FRESET uses registers B and C in the same way as FSET (Figure 2-1). If bit of register 
B is one, registers D and E must contain the address of your error handler. The shaded 
bits in Figure 2-1 should always be set to zero. 
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LXI 


B,FPR 


PUSH 


B 


MVI 


B,l 


MVI 


C,0 


LXI 


D,ERR0R1 


CALL 


FRESET 
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The FAC and Status Fields are not affected by FRESET. 

Examples: 

The following 8080 assembly-language sequence clears the Error field mask bits to zero 
and specifies a user-defined error handler whose symbolic address is ERROR1 . (Registers 
B and C are initialized separately to show clearly the specification of the error handler.) 

; REGS B,C POINT TO FPR 

; PUSH FPR ADDRESS ONTO STACK 

; USE ERROR HANDLER ADDRESSED IN D,E 

; CLEAR ERROR FIELD TO ZEROS 

; POINTER TO ROUTINE ERROR1 

; LOAD ERROR-RECOVERY INFORMATION 

PL/M-80 statements to perform the same operation would be : 

DECLARE ERRORSFLAG LITERALLY '0000000 100000000B'; ' 

CALL FRESET(.FPR,ERROR$FLAG,.ERRORl); 

FLOAD-Load FAC from Memory 

This subroutine loads a floating-point number from memory into the floating-point 
accumulator. FLO AD assumes that registers B and C contain the address of the FPR and 
that registers D and E address the low-order byte of the 32-bit number in memory. 

Examples: 

The following 8080 assembly-language sequence loads a number, whose symbolic address 
is AUGEND, into the FAC. 

; REGS B,C POINT TO FPR 

; REGS D,E POINT TO 'AUGEND' 

; LOAD AND UNPACK 'AUGEND' 

In PL/M-80, the same number is loaded by 
CALL FLOAD(.FPR,.AUGEND); 

FSTOR— Store Number into Memory from FAC 

This subroutine stores the floating-point number in the FAC into memory. FSTOR 
assumes that registers B and C contain the address of the FPR and that registers D and E 
contain the address of the low-order byte of a 32-bit memory location. 

Examples: 

This 8080 assembly-language example stores the contents of the FAC into the memory 
location addressed by RESULT. 

; REGS B,C POINT TO FPR 

; REGS D,E POINT TO 'RESULT' 

; STORE FAC CONTENTS 

The store is done in PL/M-80 by 

CALL FSTOR(.FPR,.RESULT); 



LXI 


B,FPR 


LXI 


D,AUGEND 


CALL 


FLO AD 



LXI 


B,FPR 


LXI 


D,RESULT 


CALL 


FSTOR 
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FSTAT— Access Status Information 

This function is called to access the contents of the FPR's Status field. FSTAT assumes 
the address of the FPR has been loaded into the B and C registers. When FSTAT is called, 
the contents of the Status field (one byte) are returned in the 8080 accumulator (register 
A). 

Examples: 

In 8080 assembly language, the Status field is loaded by 

LXI B,FPR ; REGS B,C POINT TO FPR 

CALL FSTAT ; STATUS FIELD LOADED IN REG A 

or, in PL/M-80, 

DECLARE STATFUN BYTE; 
STATFUN = FSTAT(.FPR); 

FERROR— Access Error Information 

This function is called to access the contents of the FPR's Error field. It assumes the 
address of the FPR has been loaded into the B and C registers. FERROR returns the 
Error field contents (two bytes) to registers H and L. 

Examples: 

This 8080 assembly-language example loads the contents of the Status and Error fields 
into the accumulator (register A) and into registers H and L, respectively. 

; REGS B,C POINT TO FPR 

; STATUS FIELD LOADED INTO REG A 

; ERROR INFO TO REGS H,L 

In PL/M-80, the corresponding operations would be: 

DECLARE STATFUN BYTE, 

ERRFUN ADDRESS; 

STATFUN = FSTAT(.FPR); 
ERRFUN = FERROR(.FPR); 



LXI 


B,FPR 


CALL 


FSTAT 


CALL 


FERROR 
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CHAPTER 3 
IC PROCEDURES 



This chapter describes the FPAL procedures for performing floating-point 'arithmetic' 
These procedures are: 

add floating-point numbers. 

do floating-point subtraction. 

multiply floating-point numbers. 

do floating-point division. 

convert a decimal floating-point number to binary. 

convert a binary floating-point number to decimal. 

convert a floating-point number to an integer. 

convert an integer to a floating-point number. 

to compare floating-point numbers. 

to compare the FAC to zero. 

negate (change) the sign of the FAC. 

clear the FAC to zero. 

set the FAC to its absolute value. 

All of these subroutines assume that the B-C register pair contains the address of the FPR. 
If a second operand, stored in memory, is needed to perform an operation, the address of 
that operand's low-order byte is supplied in the D-E register pair. FCMPR and FZTST 
return their results to register A; FIXSD stores a fixed-point number into memory; 
FQFB2D stores a decimal floating-point number into memory; the other subroutines 
leave their results in the FAC. 

These procedures, with the exception of FQFD2B and FQFB2D, save all 8080 registers 
(except those registers receiving results from the arithmetic operation called). 

Appendix C summarizes all FPAL procedures and the error conditions they can return. I 
Error handling is described in detail in Chapter 4. 

NOTE 

The FPR initialization subroutine (FSET) must be 

called before any of the arithmetic procedures can I 

be used; otherwise, the results are undefined. 



FADD 


A subroutine to 


FSUB 


A subroutine to 


FMUL 


A subroutine to 


FDIV 


A subroutine to 


FQFD2B 


A subroutine to 


FQFB2D 


A subroutine to 


FIXSD 


A subroutine to 


FLTDS 


A subroutine to 


FCMPR 


A byte function 


FZTST 


A byte function 


FNEG 


A subroutine to 


FCLR 


A subroutine to 


FABS 


A subroutine to 



FADD— Floating-Point Addition 



This subroutine adds a floating-point number in memory to the number in the Floating- 
Point Accumulator and leaves the sum in the FAC. FADD assumes that registers B and C 
contain the address of the FPR and that registers D and E address the low-order byte of 
the number in memory. 
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Examples: 



8080 assembly language: 

B,FPR 

D.AUGEND 

FLOAD 



LXI 

LXI 

CALL 

LXI 

CALL 

LXI 

CALL 



D.ADDEND 
FADD 
D.SUM 
FSTOR 



REGS B,C POINT TO FPR 
REGS D,E POINT TO 'AUGEND' 
LOAD 'AUGEND' INTO FAC 
REGS D,E POINT TO 'ADDEND' 
ADD AUGEND AND ADDEND 
REGS D,E POINT TO 'SUM' 
STORE RESULT IN 'SUM' 



PL/M-80: 

CALL 
CALL 
CALL 



FLO AD(.FPR,. AUGEND) ; 
FADD(.FPR,. ADDEND) ; 
FSTOR(.FPR,SUM); 



FSUB— Floating-Point Subtraction 

This subroutine subtracts a floating-point number in memory from the number in the 
Floating-Point Accumulator and leaves the result in the FAC. FSUB assumes that 
registers B and C contain the address of the FPR and that registers D and E address the 
low-order byte of the number in memory. 

Examples: 



8080 assembly language: 



LXI 

LXI 

CALL 

LXI 

CALL 

LXI 

CALL 

PL/M-80: 

CALL 
CALL 

CALL 



B,FPR 

D,MINEND 

FLOAD 

D.SBHEND 

FSUB 

D.RESULT 

FSTOR 



REGS B,C POINT TO FPR 
REGS D,E POINT TO MINUEND 
MINUEND LOADED INTO FAC 
REGS D,E POINT TO SUBTRAHEND 
SUBTRACT SUBTRAHEND FROM MINUEND 
REGS D,E POINT TO 'RESULT' 
STORE RESULT 



FLOAD(.FPR,.MINUEND); 

FSUB(.FPR,.SUBTRAHEND); 

FSTOR(.FPR,.RESULT); 



FMUL-Floating-Point Multiplication 

This subroutine multiplies the number in the Floating-Point Accumulator by a floating- 
point number in memory and leaves the product in the FAC. FMUL assumes that 
registers B and C contain the address of the FPR and that registers D and E address the 
low-order byte of the number in memory. 

Examples: 



8080 assembly language: 



LXI 


B,FPR 


LXI 


D.MPCAND 


CALL 


FLOAD 


LXI 


D.MPLIER 


CALL 


FMUL 


LXI 


D,PRODUCT 


CALL 


FSTOR 



REGS B,C POINT TO FPR 
REGS D,E POINT TO MULTIPLICAND 
MULTIPLICAND LOADED INTO FAC 
REGS D,E POINT TO MULTIPLIER 
PERFORM MULTIPLICATION 
REGS D,E POINT TO 'PRODUCT' 
STORE PRODUCT 
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PL/M-80: 

CALL 
CALL 
CALL 



FLOAD(.FPR,.MULTIPLICAND); 

FMUL(.FPR,.MULTIPLIER); 

FSTOR(.FPR,.PRODUCT); 



FD1V— Floating-Point Dlwision 



This subroutine divides the number in the Floating-Point Accumulator by a floating-point 
number in memory and leaves the quotient in the FAC. FDIV assumes that registers B 
and C contain the address of the FPR and that registers D and E address the low-order 
byte of the number in memory. 

Examples: 



8080 assembly language: 



LXI 

LXI 

CALL 

LXI 

CALL 

LXI 

CALL 

PL/M-80: 

CALL 
CALL 
CALL 



B,FPR 

D,DVDEND 

FLO AD 

D,DIVSOR 

FDIV 

D,QUOTNT 

FSTOR 



REGS B,C POINT TO FPR 
REGS D,E POINT TO DIVIDEND 
DIVIDEND LOADED INTO FAC 
REGS D,E POINT TO DIVISOR 
PERFORM DIVISION 
REGS D,E POINT TO 'QUOTNT' 
STORE QUOTIENT 



FLOAD(.FPR,.DIVIDEND) ; 
FDIV(.FPR,.DIVISOR); 
FSTOR(.FPR,.QUOTIENT) ; 



FQFD2B— Decimal to Binary Conversion 

This subroutine converts a decimal floating-point number in memory to a binary floating- 
point number and loads it into the FAC. FQFD2B assumes that registers B and C contain 
the address of the FPR and that registers D and E point to a 6-byte control block in 
memory. The control block, in turn, points to the decimal number to be converted. 
Before calling FQFD2B you must define the control area and have the necessary informa- 
tion loaded into it. 

The formats of the control block and decimal number are shown in Figure 3-1. In this 
figure, 

SIGN is the ASCII representation of '+' or '-'; FQFD2B assumes a '+' unless 

'-' is specified; 

SCALE is a 16-bit, two's complement integer considered to be the exponent 

often; 

LENGTH is an unsigned byte integer specifying the number of digits in the 
decimal number; 

ADDRESS is a 16-bit address pointing to the first byte of the decimal number to 
be converted; 

Dj . . . D n are ASCII representations of decimal digits and 'n' is the same as 
LENGTH. 

The value of the number represented by this record is: 

SIGN(DiD 2 . . . D n )*10 SCALE 
Zero is represented by setting all digits to zero or by setting LENGTH to zero. 



3-3 



Arithmetic Procedures 



CONTROL BLOCK 


DECIMAL NUM 


BER 


8080/8085 FPAL 




ADDRESS 






Dn 












LENGTH 
SCALE 










D 2 






D1 




REGS D,E 
POINTER 


SIGN 











Figure 3-1. Control Block Format 



Examples: 

8080 assembly language: 

DSIGN: DS 1 

DSCALE: DS 2 

DLNGTH: DS 1 

DADDR: DS 2 



; DEFINE CONTROL 
; BLOCK 



LXI 


B, FPR 


LXI 


D, DSIGN 


CALL 


FQFD2B 



PROGRAM MUST SCAN DECIMAL NUMBER AND LOAD NECESSARY 
INFORMATION IN CONTROL BLOCK 



REGS B,C POINT TO FPR 

REGS D,E POINT TO CONTROL BLOCK 

CONVERSION DONE, RESULT STORED 

INFAC 



PL/M-80: 

DECLARE CONTROL STRUCTURE( 

SIGN BYTE, 

SCALE ADDRESS, 

SLENGTH BYTE, 

STRINGSPTR ADDRESS), 
STRING (m) BYTE; 
/*WHERE m IS GREATER THAN OR EQUAL TO CONTROL.SLENGTH*/ 



/♦PROGRAM MUST SCAN DECIMAL NUMBER AND LOAD NECESSARY*/ 
/♦INFORMATION INTO CONTROL BLOCK*/ 



CALL FQFD2B(.FPR, .CONTROL); 



QFB2D— Binary to Decimal Conversion 

This subroutine converts a binary floating-point number in the FAC to a decimal floating- 
point number and stores the result in memory. FQFB2D assumes that registers B and C 
contain the address of the FPR and that registers D and E point to a control block in 
memory. The control block has the format shown in Figure 3-1 and points, in turn, to the 
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memory location where the converted number is to be stored. At the time FQFB2D is 
called, you must also specify the contents of the LENGTH and ADDRESS fields of the 
control block. 

The LENGTH field specification determines the precision of the result. The first digit 
(Dj) is nonzero unless the FAC contains zero. 

Example: 

8080 assembly language: 

; DEFINE STORAGE AS IN THE FQFD2B EXAMPLE ABOVE 



LENGTH FIELD SPECIFIED 

ADDRESS FIELD SPECIFIED 

REGS B,C POINT TO FPR 

REGS D,E POINT TO CONTROL BLOCK 

CONVERSION DONE, RESULT STORED 

IN MEMORY 



PL/M-80: 

/♦DECLARE CONTROL BLOCK STRUCTURE AS IN THE*/ 
/♦FQFD2B EXAMPLE ABOVE*/ 



/♦ASSIGN POINTER TO SOME STRING ARRAY*/ 
CONTROL.STRINGSPTR = .STRING; 
/♦ASSIGN VALUE FOR LENGTH OF STRING*/ 
CONTROL.SLENGTH =10; 
CALL FQFB2D(.FPR,.CONTROL); 



DLNGTH 


SET 


10 


DADDR 


SET 


F0C8H 




LXI 


B,FPR 




LXI 


D, DSIGN 




CALL 


FQFB2D 



FIXSD— Floating-Point to Integer Conversion 

This subroutine converts the floating-point (real) number in the FAC to a fixed-point 
(integer) number and stores the result in memory. This conversion is done with truncation 
(for example, 1.9 is converted to 1 and -1.9 is converted to -1). FIXSD assumes that 
registers B and C contain the address of the FPR and that registers D and E address the 
low-order byte of a 4-byte storage location. The resulting integer is stored in this location 
in two's complement format. See Appendix A, Figure A-3. 

Examples : 



8080 assembly language: 

LXI B,FPR 

D,FLTNUM 



LXI 
CALL 
LXI 
CALL 

PL/M-80: 

CALL 
CALL 



FLO AD 

D,FIXNUM 

FIXSD 



REGS B,C POINT TO FPR 
REGS D,E POINT TO 'FLTNUM' 
LOAD FLOATING-POINT NUMBER 
ADDRESS FOR STORING RESULT 
DO CONVERSION AND STORE RESULT 



FLO AD(.FPR,.FP$NUMBER$ ADDRESS) ; 
FIXSD(.FPR,.INTEGER$ ADDRESS) ; 
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FLTDS— Integer to Floating-Point Conversion 

This subroutine converts a fixed-point number (32-bit signed integer) in memory to a 
floating-point number and loads the result into the Floating-Point Accumulator. Conver- 
sion is done using unbiased rounding (see Appendix B). FLTDS assumes that registers B 
and C point to the FPR and that registers D and E address the low-order byte of a 32-bit 
two's complement integer. 

Examples: 



8080 assembly language: 

LXI B,FPR 

D,FIXNUM 



LXI 
CALL 

PL/M-80: 
CALL 



FLTDS 



REGS B,C POINT TO FPR 
REGS D,E POINT TO INTEGER 
CONVERT INTEGER TO FLOATING-POINT 
AND LOAD INTO FAC 



FLTDS(.FPR,.INTEGER$ADDRESS); 



FCMPR-Floating-Point Number Comparison 

This function compares a number in the Floating-Point Accumulator to a floating-point 
number in memory. The resulting Status field settings are returned to the 8080 accumu- 
lator (register A). FCMPR assumes the B and C registers point to the FPR and that 
registers D and E address the low-order byte of the number in memory. 

If the comparison is successful, one of the following bit patterns is set in the Status field 
I and loaded into register A. ('IT means the bit is undefined and reserved for FPAL use.) 

100UU000 FAC = number in memory 

1 0UU000 F AC> number in mem ory 

00 1 UU000 FAC < number in memory 

Examples: 



8080 assembly language: 



LXI 

LXI 

CALL 

LXI 

CALL 



B,FPR 
D,FACNUM 
FLO AD 
D,MEMNUM 
FCMPR 



REGS B,C POINT TO FPR 
REGS D,E POINT TO 'FACNUM' 
LOAD 'FACNUM' INTO FAC 
REGS D,E POINT TO 'MEMNUM' 
NUMBERS COMPARED, STATUS TO REG A 



PL/M-80: 

CALL 
I STAT = 



FLOAD(.FPR,.FAC$NUMBER$ADDR); 
FCMPR(.FPR,.MEMORYSNUMBER$ADDR); 



FZTST— Compare FAC to Zero 

I This function compares the number in the Floating-Point Accumulator to zero and 
returns the Status field to the 8080 accumulator (register A). FZTST assumes that 
registers B and C address the FPR. 
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If the comparison is successful, one of the following bit patterns is set in the Status field 
and returned to register A. ('IT means the bit is undefined and reserved for FPAL use.) 

100UUOOO FAC = 

010UU000 FAOO 

001UU000 FAC<0 



Examples: 

8080 assembly language: 

LXI B,FPR 

LXI D.TSTNUM 

CALL FLOAD 

CALL FZTST 



REGS B,C POINT TO FPR 

REGS D,E POINT TO TEST NUMBER 

LOAD TEST NUMBER INTO FAC 

COMPARE NUMBER TO 0, STATUS TO REG A 



PL/M-80: 

CALL FLOAD(.FPR,.TEST$NUMBER$ADDR); 

STAT=FZTST(.FPR); 



FNEG— Change Sign of FAC 

This subroutine negates (complements) the sign bit of the FAC if the contents of the 
FAC are nonzero. A '1' bit is changed to '0' and vice-versa. If the number in the FAC is 
zero, no action is taken. FNEG assumes that registers B and C address the FPR. 

Examples: 



8080 assembly language: 

LXI B,FPR 

D,NEGNUM 



LXI 

CALL 
CALL 



FLOAD 
FNEG 



REGS B,C POINT TO FPR 

REGS D,E ADDRESS NUMBER WHOSE SIGN 

IS TO BE NEGATED 

LOAD 'NEGNUM' 

NEGATE SIGN OF 'NEGNUM' 



PL/M-80: 

CALL 
CALL 



FLOAD(.FPR,.NEGATE$NUMBER$ ADDR) ; 
FNEG(.FPR); 



FCLR-Ciear FAC to Zero 

This subroutine clears the FAC by loading it with a floating-point zero (see Appendix B). 
FCLR assumes the B and C registers point to the FPR. 

Examples: 



8080 assembly language: 

LXI B,FPR 

CALL FCLR 



; REGS B,C POINT TO FPR 
; THE FAC IS ZEROED 



PL/M-80: 
CALL 



FCLR(.FPR); 
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FABS-Absolute Value 

This subroutine sets the floating-point number in the FAC to its absolute value, that is, 
the sign bit is set to zero. FABS assumes the B and C registers address the FPR. 

Examples: 



8080 assembly language: 

LXI 
CALL 



B,FPR 
FABS 



; REGS B,C POINT TO FPR 
; SIGN BIT SET TO ZERO 



PL/M-80: 
CALL 



FABS(.FPR); 



Sample Programs 

8080 Assembly-Larsgyage Example 

The following assembly-language example computes the weighted inner product 

D? = (A1*B1+A2*B2+A3*B3)/C1 

Al, A2, A3, Bl, B2, B3, and CI represent addresses of floating-point numbers, FPR is 
the address of the Floating-Point Register and IP is the address where the result is to be 
stored. 

First, we must reserve storage for the FPR and floating-point operands used in the 
equation. This is done with the 'DS' assembler directive. 



FPR: 


DS 


18 


Al: 


DS 


4 


Bl: 


DS 


4 


A2: 


DS 


4 


B2: 


DS 


4 


A3: 


DS 


4 


B3: 


DS 


4 


CI: 


DS 


4 


IP: 


DS 


4 



Next, we must declare the FPAL subroutines to be external using the 'EXTRN' directive. 
EXTRNFSET,FLOAD,FMUL,FADD,FDIV,FSTOR 
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The equation is then computed by the following sequence of loads and calls. Remember 
that FSET must be called before all other subroutines. 



B,C POINTS AT THE FPR 

DEFAULT ERROR HANDLER TO BE USED 

FPR IS INITIALIZED 

POINTERS TO FPR AND Al ARE LOADED 

Al IS LOADED INTO THE FAC 

POINTER TO Bl IS LOADED 

Al *B1 IS FORMED IN THE FAC 

POINTER TO IP IS LOADED 

Al *B1 STORED IN LOCATION ADDRESSED 

BY IP 

A2 IS LOADED INTO THE FAC 

A2*B2 IS FORMED IN THE FAC 

Al *B1 + A2*B2 IS FORMED IN THE FAC 
Al * Bl + A2 * B2 IS STORED IN IP 

A3 IS LOADED INTO THE FAC 

A3*B3 IS FORMED IN THE FAC 

A1*B1 +A2*B2 + A3*B3ISFORMEDIN 
THE FAC 

(A1*B1 + A2*B2 + A3*B3)/C1 IS FORMED 
IN THE FAC 

(A1*B1 + A2*B2 + A3*B3)/C1 IS STORED 
IN IP 



This example assumes the default error handler (FERHND) is to be used. At the end of 
the computation, you can check to see whether any errors occurred by executing the 
following code sequence : 

CALL FERROR ; THE CUMULATIVE ERROR INDICATORS ARE 

; RETURNED IN H,L 



LXI 


B.FPR 


PUSH 


B 


LXI 


B,0 


CALL 


FSET 


LXI 


B,FPR 


LXI 


D,A1 


CALL 


FLO AD 


LXI 


D,B1 


CALL 


FMUL 


LXI 


D,IP 


CALL 


FSTOR 


LXI 


D,A2 


CALL 


FLOAD 


LXI 


D,B2 


CALL 


FMUL 


LXI 


D,IP 


CALL 


FADD 


CALL 


FSTOR 


LXI 


D,A3 


CALL 


FLOAD 


LXI 


D,B3 


CALL 


FMUL 


LXI 


D,IP 


CALL 


FADD 


LXI 


D,C1 


CALL 


FDIV 


LXI 


D,IP 


CALL 


FSTOR 



MOV 

ANI 

JNZ 



A,L 

11111000B 

HELP 



; MASK OFF THE OPTION BITS 

; AT LEAST ONE ERROR OCCURRED 



PL/M-80 Example 

The following PL/M-80 example computes the same weighted inner product as the 
assembly -language example : 

IP = (Al *B1 + A2*B2 + A3*B3)/C1 

Al, A2, A3, Bl, B2, B3, and CI represent addresses of floating-point numbers, FPR is 
the address of the Floating-Point Register and IP is the address where the result is to be 
stored. 
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We must first declare the FPAL subroutines used to be external procedures and reserve 
the FPR memory area as an array. Declaring the operators to be arrays too ensures that 
they will occupy contiguous locations in memory, thus allowing use of the dot operator 
in calling the subroutines. For the sake of illustration, the FSTAT function is also 
included in this example. 



/♦DEFINE EXTERNAL PROCEDURES*/ 

FSET: 

END FSET; 

FADD: 

END FADD; 

FDIV: 

END FDIV; 

FMUL: 

END FMUL; 

FLO AD: 



PROCEDURE (FA.OP1 ,OP2) EXTERNAL; 
DECLARE(FA,OPl,OP2) ADDRESS; 



PROCEDURE(FA,OA) EXTERNAL; 
DECLARE(FA,OA) ADDRESS; 



PROCEDURE(FA,OA) EXTERNAL; 
DECLARER A,0 A) ADDRESS; 



PROCEDURE(FA,OA) EXTERNAL; 
DECLARE(FA,OA) ADDRESS; 



PROCEDURE(FA,OA) EXTERNAL; 
DECLARE(FA,OA) ADDRESS; 
END FLOAD; 



FSTOR: 
END FSTOR; 
FSTAT: 



PROCEDURES A,OA) EXTERNAL; 
DECLARE(FA,OA) ADDRESS; 



PROCEDURE(FA) BYTE EXTERNAL; 
DECLARE(FA) ADDRESS; 



END FSTAT; 



/♦DECLARE BYTE ARRAYS*/ 



FPR(18) 


BYTE, 


Al(4) 


BYTE, 


A2(4) 


BYTE, 


A3(4) 


BYTE, 


Bl(4) 


BYTE, 


B2(4) 


BYTE, 


B3(4) 


BYTE, 


CI (4) 


BYTE, 


IP(4) 


BYTE, 


STATUS 


BYTE; 
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/*IP COMPUTED BY FOLLOWING CALLS*/ 
/*FSET MUST BE CALLED FIRST*/ 

CALL FSET(.FPR,0,0); /*USE FERHND*/ 

CALL FLOAD(.FPR,.Al); 

CALL FMUL(.FPR,.B1); 

CALL FSTOR(.FPR,.IP); 

CALL FLOAD(.FPR,.A2); 

CALL FMUL(.FPR,.B2); 

CALL FADD(.FPR,.IP); 

CALL FSTOR(.FPR,.IP); 

CALL FLOAD(.FPR,.A3); 

CALL FMUL(.FPR,.B3); 

CALL FADD(.FPR,.IP); 

CALL FDIV(.FPR,.C1); 

CALL FSTOR(.FPR,.IP); 

/*RETURN STATUS FIELD*/ 

STATUS = FSTAT(.FPR); 
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Error-Handling Operation I 

When an error occurs during an FPAL operation, the following steps are taken: I 

1 . The address of the FPR is pushed onto the 8080 stack. 

2. A code is placed in the B-C register pair indicating which procedure was executing I 
when the error was detected. 

3. The error code bits in the FPR's Status field are set to indicate the type of error 
detected. 

4. The appropriate cumulative error bit in the FPR's Error field is set. I 

5. The error-handler subroutine is called. 

The bit settings mentioned in steps 2, 3, and 4 are listed in Appendix C. 

If the executing procedure required a second operand, that operand's address is in the ' 
D-E register pair. Otherwise, the D-E register pair is ignored. 

FERHND-Default Error Handler 

This subroutine is the error handler supplied as part of the floating-point library. You 
may also write your own error handler and load its address using the FSET or FRESET 
subroutines (Chapter 2). 

The operations performed by FERHND vary depending on which procedure was I 
executing. 

Error During Arithmetic Operation 

If FERHND was called during one of the four basic arithmetic operations (FADD, FSUB, 
FMUL, FDIV) one of the following situations occurs: 

• If underflow is indicated, the FAC is set to zero and the Status field is set to 
'UUUUU0OO; where 'U' means the bit setting is undefined. 

• If overflow is indicated, the FAC is set to the largest or smallest representable number 
(if the correct result was positive or negative, respectively). The Status field is set to 
'UUUUU000.' 

• If division by zero was attempted, the FAC is set to an invalid number representing 
an 'indefinite' result. The Y bit is zero, all exponent bits are one, and all fraction bits 
are zero. The Status field is set to 'UUUUU101.' 

• If an invalid operand was encountered, no operation is performed and FERHND 
returns to the calling subroutine. 

• If none of these conditions holds, FERHND simply returns to the calling subroutine. 

Error During FQFD2B Operation 

The FQFD2B procedure does not check for valid ASCII representations in the input 
operand. If invalid data is used, no error conditions are reported but the result is 

undefined. 
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Overflow or underflow may occur during the conversion. In this case the error is regarded 
as an arithmetic error and the error is handled as described in the preceding section. 

Error During FQFB2D Operation 

As in the case of FQFD2B, overflow or underflow errors may result from an arithmetic 
operation within the conversion procedure. These errors are handled by the arithmetic 
procedure involved. 

If the FAC contains an invalid quantity when FQFB2D is called, this procedure stores 
an asterisk (*) in the SIGN position of the decimal representation (see Figure 3-1) and in 
digit positions D2 through D n . One of the following codes is stored in the first digit 
position (Pi): 

+ if the FAC contains +INF 

if the FAC contains -INF 

? if the FAC contains IND 

if the FAC contains -0 

* if the FAC contains any other invalid quantity. 

'INF' and TND' are defined in Appendix B. 



Error During FIXSD Operation 

If FERHND is called by FIXSD, one of the following occurs: 

• If overflow is indicated (number in FAC too large to be converted to a 32-bit integer), 
the result is set to the largest positive or negative integer (if the number in the FAC 
is positive or negative, respectively). The FPR remains unchanged except that the 
Status field is set to 'UUUUU000.' 

• If the number in the FAC is invalid, FERHND simply returns. The integer stored by 
FIXSD is undefined. 



Error During FCMPR Operation 

If FERHND is called by FCMPR, at least one of the operands must be invalid. If the 
operands are identical invalid bit patterns, the Status field is set to '100UU101.' Otherwise, 
I the Status field is '000UU10L' 



Error During FZTST, FNEG, or FABS Operation 

I If the calling procedure is FZTST, FNEG, or FABS, no operation is performed and the 
error handler simply returns. 

Other Calls to FERHND 

I If FERHND is called from somewhere other than the floating-point procedures listed 
above, the result is undefined. 
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Sample User Error Handlers 

If you write your own error handler and use FPAL arithmetic subroutines, be aware that 
your error handler may be called recursively. Since FPAL does not have its own stack, 
you must allocate 40 bytes of your own program stack for each level of recursion 
foreseen. 

If you are writing your error handler in PL/M, it must be written and called with three 
parameters (although the last parameter may actually be a dummy). 



Assembly-Language Example 

The following is an example of a reentrant error-recovery routine (ERREC). If the calling 
program is FADD, FSUB, FMUL, or FDIV, and if the error condition is underflow, the 
result is set to zero. Otherwise, the error-recovery routine returns. 

The address of the low-order byte of the Floating-Point Record is assumed to be on the 
stack and the B-C register pair is assumed to contain the code indicating which procedure 
called ERREC. If the procedure required two operands, the second operand's address is 
assumed to be in the D-E register pair. 



NAME 


ERREC 


CSEG 




PUBLIC 


ERREC 


EXTRN 


FCLR, FSTAT 


; SAVE THE REGISTER CONTENTS 


PUSH 


PSW 


PUSH 


B 


PUSH 


H 



MOVE THE ERROR CODE TO 'A.' LOAD THE POINTER TO THE FPR INTO 
B,C AND MOVE THE RETURN ADDRESS TO WHERE THE POINTER WAS 



MOV 


AC 


PUSH 


D 


LXI 


H,8 


DAD 


SP 


MOV 


E,M 


INX 


H 


MOV 


D,M 


INX 


H 


MOV 


CM 


INX 


H 


MOV 


B,M 


MOV 


M,D 


DCX 


H 


MOV 


M,E 


POP 


D 



THE CODE SETTINGS IN 'A' DESIGNATE WHICH PROCEDURE CALLED 
THE ERROR RECOVERY ROUTINE 
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A=l 


FADD 




A=2 


FSUB 




A=3 


FMUL 




A = 4 


FDIV 




A = 5 


FIXSD 




A = 6 


FCMPR 




A = 7 


FZTST 




A=8 


FNEG 




A = 9 


FABS 
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IF A = 1 , 2, 3, 4 AND IF THE ERROR CONDITION IS UNDERFLOW 
SET THE RESULT TO ZERO. OTHERWISE, SIMPLY RETURN. 



CPI 


5 


JNC 


DONE 


CALL 


FSTAT 


ANI 


0000011 IB 


CPI 


4 


JNZ 


DONE 


CALL 


FCLR 


; RESTORE REGISTERS AND STACK 


DONE: POP 


H 


POP 


B 


POP 


PSW 


INX 


SP 


INX 


SP 


RET 




END 





PL/M-80 Example 

The following code tells the FPAL that a user routine (USERSERROR) is to be called 
when an error is detected and loads the address of the error routine into the FPR. If the 
calling procedure required two operands, the second operand's address is passed as the 
third parameter of USERSERROR. 

DECLARE ERRORSFLAG LITERALLY '0000000 100000000B'; 
CALL FSET(.FPR,ERROR$FLAG,.USER$ERROR); 

The remainder of this example is code needed to print a message indicating which 
procedure was running when the error occurred. 
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WRITE PROCEDURE (AFT,BUFFER,COUNT,STATUS) EXTERNAL; 

DECLARE (AFT,BUFFER,COUNT,STATUS) ADDRESS; 
END WRITE; 

USERSERROR: PROCEDURE (FPR,ERROR,ADDR); 

DECLARE (FPR,ERROR,ADDR,STATUS) ADDRESS; 

DO CASE ERROR; 

CALL WRITE (0,.('FADD ERROR ').l 1 ,-STATUS); 
CALL WRITE (0,.('FSUB ERROR '),1 1 ,-STATUS); 
CALL WRITE (0,.('FMUL ERROR '),1 1,. STATUS); 
CALL WRITE (0,.('FDIV ERROR '),i 1, .STATUS); 
CALL WRITE (0,.('FIXSD ERROR '),12,.STATUS); 
CALL WRITE (0,.('FCMPR ERROR '), 12, .STATUS); 
CALL WRITE (0,.('FZTST ERROR '),i2,.STATUS); 
CALL WRITE (0,.('FNEG ERROR '),11, -STATUS); 
CALL WRITE (0,.('FABS ERROR *),1 1 ,-STATUS); 
END; 
END USERSERROR; 
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The FPAL procedures reside in object module form in the library FPAL.LIB on the 
ISIS-II system diskette. You need only declare the names of the FPAL procedures you 
use to be 'external' and call them when they are needed. When you have completed 
program development, you must link the necessary floating-point procedure to your 
object module. 

FPAL procedure names are declared to be external using the EXTRN directive in I 
assembly language or the EXTERNAL attribute in PL/M. The simplest way to do this is 
to create a file containing external declarations for the FPAL procedures you will be I 
using, then incorporate this file into your source program using the INCLUDE control 
in the 8080/8085 assembler or PL/M-80 compiler. For example, you might imbed the 
INCLUDE control in your source code as follows: 

$INCLUDE(:F1:FPEXTN.SRC) I 

Since the FPAL procedures reside in an ISIS-II library, they can be linked quite easily I 
by linking the entire library. The linker then scans your program and links only those 
procedures you need (those that satisfy external references). Linking is done at the I 
ISIS-II command level following successful assembly/compilation to produce a relocatable 
8080 object module. The ISIS-II system library and PL/M-80 library must be linked also. I 

Example : 

-LINK :F1:MYPROG.OBJ,FPAL.LIB,SYSTEM.LIB,PLM80.LIB TO :Fl:MYPROG.LNK 

You can also specify individually the FPAL procedures you want linked from FPAL.LIB. I 
If you choose to let the linker satisfy external references, you should be sure you do not 
have external declarations for procedures you don't use. For example, you would not 
want to create an 'include' file containing external declarations for all FPAL procedures 
unless you plan to specify individual 'modules' at the time you link FPAL.LIB, or intend 
to use all of them. 
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APPENDIX A 
FLOATING-POINT RECORD FORMAT 



The Floating-Point Record is allocated as shown in Figure A-l. 



FLOATING-POINT 
ACCUMULATOR 



LOW ADDRESS 
(POINTER) 



s 


















es 


e7 


e6 


e 5 


e4 


e3 


e2 


ei 




f 23 


f 2 2 


f21 


f 20 


fl9 


^18 


fl7 


fl6 




fl5 


fl4 


U3 


fl2 


fll 


fio 


f9 


f8 




f7 


f6 


*5 


f4 


f3 


f2 


^1 


fo 




^ 

Y 














V 


*> 




















IE 


OE 


UE 


ZE 


DE 




!:&:$: 










































E 


G 


L 


:8PS; 




EC 


EC 


EC 





EXPONENT FIELD 



FRACTION FIELD 
(11 BYTES) 



ERROR FIELD 



ERROR-HANDLER 
ADDRESS FIELD 



STATUS FIELD 



Status Field 



Figure A-l. Floating-Point Record Format 



Six bits are currently defined in the Status field. The setting of these bits depends on the 
floating-point function performed. The undefined bits are reserved for FPAL use. I 

The E, G, and L bits act as flags following a comparison (FCMPR, FZTST). A number in 
the FAC is compared to a second number and 

E = 1 if the FAC = second operand, 

G = 1 if the FAC > second operand, 

L = 1 if the FAC < second operand. 
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The three EC (error condition) bits indicate whether an error just occurred. The type of 
error can be determined from these bit settings as follows: 



Error Code 

000 
001 
010 
011 
100 
101 
110 
111 



Interpretation 

No error 

Attempted division by zero 

Domain error (e.g., yj~-l ) 

Overflow 

Underflow 

Invalid number in FAC 

Invalid number in memory 

Currently undefined 



I 



Error-Handler Address Field 

The Error-Handler Address field contains the address of the error-handler subroutine. 
This may be the FPAL's default error handler, FERHND (described in Chapter 4), or a 
routine of your own. In either case, the address is loaded into this field by either the 
initialization subroutine (FSET) or the reset subroutine (FRESET). 

Error Field 

The bits in the Error field are used to accumulate error statistics. Only five bits of this 
field are used currently. 



| If any of the IE, OE, UE, ZE or DE bits is set, the error described below has occurred 

at least once since the last time the respective bit was set to zero (by the FSET or 
FRESET subroutine). 

Bit Interpretation 

IE Invalid operand 

OE Overflow error 

UE Underflow error 

ZE Attempted division by zero 

DE Domain error 



The remaining three bits of the low-address byte are currently unused. Setting any of 
these bits to one causes undefined results. 



Floating-Point Accumulator 



The Fraction and Exponent fields shown in Figure A-l actually contain an unpacked 
version of the format assumed for 32-bit floating-point numbers in memory (Figure A-2). 
The f23 (normalization) bit shown in Figure A-l is implied in the packed format; f23 = 
if the Exponent field is zero and otherwise {23 = 1. In both figures, V is the 'sign' bit. 



HIGH ADDRESS 



LOW ADDRESS 
(POINTER) 



s 


e 8 


e7 


e6 


e5 


e 4 


e3 


e 2 


ei 


f 2 2 


f 21 


f20 


f 19 


fl8 


fl7 


fl6 


*15 


*14 


fl3 


fl2 


fl1 


fio 


f9 


f8 


f7 


f6 


f5 


U 


*3 


f2 


fl 


fo 



Figure A-2. Floating-Point Number Format in Memory 
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Floating-Point Record Format 



Two FPAL subroutines operate on 32-bit integers. FIXSD converts a floating-point 
number in the FAC to an integer in memory. FLTDS converts an integer in memory into 
a floating-point number in the FAC. The format of the 32-bit two's complement integer 
stored in memory is shown in Figure A-3. In this figure, i32 (the high-order bit) is the sign 
bit. 



HIGH ADDRESS 



LOW ADDRESS 
(POINTER) 



'32 



Figure A-3. Integer Format in Memory 
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APPENDIX B 
DEFINITIONS 



This appendix defines terms used elsewhere in the manual along with the formulas used 
for rounding values and decoding exponent wraparound. 



Floating-Point Zero 



The word with all bits equal to zero is defined as the unique floating-point zero. No other 
form for floating-point zero is provided by the FPAL. 

Invalid Numbers 

All bit patterns are valid except those described here. 

The first set of invalids are those whose exponent field is set to all ones. This set is used 
for infinities, indefinites, pointers, etc. Infinities are defined as: 

+INF V bit = 0; all other bits = 1 

-INF all bits = 1 

The indefinite form is: 

IND V = 0; exponent bits all = 1 ; fraction bits = I 

A second set of bit patterns is currently defined as invalid. These are numbers whose I 
exponent field is zero with at least one other bit set to one. 

Single-Precision Format 

Single-precision formats in the Floating-Point Accumulator and 8080 memory are as 
shown in Figures A-l and A-2. The three fields within these formats are: 

s Sign bit. Sign-magnitude representation where s=0 means positive and 

s= 1 means negative. 

e Exponent bits. The exponent is offset by 2 7 - 1 . All zeros and all 

ones in the exponent field are currently reserved for the floating-point 
zero and the invalid numbers described above. 

f Fraction bits. When the exponent is nonzero, a one bit is assumed at 

the left of the fraction; the binary point is between the assumed bit and 
the explicit fraction bit. 

The number base for the FPAL is binary. The value of a given binary representation 
(where V is the sign bit, 'e' is a binary exponent value, and T is a binary fraction value) 
can be formulated as: 

(-l) s -2 e - (2? - 1) -(l.+ .f) where e gt and e ¥= FF I 
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Rounding 

If rounding is required to produce the final result of a floating-point operation (which 
does not include FQFD2B and FQFB2D), 'unbiased' rounding is used. With this type of 
rounding, the result is rounded up or down depending on whether the first bit beyond the 
last bit being retained is 1 or 0. In the ambiguous case where the true result is exactly 
midway between two floating-point numbers, the nearest 'even' number is returned (that 
is, the last bit retained is forced to a zero). Therefore, if no error occurs, the result is the 
floating-point number closest to the true result. 

Exponent Wraparound 

When overflow or underflow occurs during FPAL operations, the correct fraction results 
but the exponent is 'wrapped around.' This is consistent with the FPAL development 
philosophy that no information should be lost and that you, the user, should be able to 
decide what you want to do when an overflow/underflow exception occurs. 

A 'wrapped around' exponent is defined to be e w where the true (offset) exponent e t 
can be derived from e w by considering an expanded range of exponents and 

on overflow e t = e w + (3.2 6 - 2) 

on underflow e t = e w - (3.2 6 - 2) 
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APPEMDIX C 
>AL PROCEDURES 



Basic Operation 

Table C-l summarizes the input prerequisites of each FPAL procedure and the output 
returned. FERHND is not listed since it is called by other procedures, not by the user. 
Remember that FSET must be called before any other procedure. 

Table C-l. FPAL Procedure Operation 



FPAL 
Procedure 


B,C 
Addresses 


D,E 

Addresses 


Result 
Stored at 


Operation 


FABS 


FPR 


— 


FAC 


|FAC| «- FAC 


FADD 


FPR 


MEM 


FAC 


FAC «- FAC + MEM 


FCLR 


FPR 


— 


FAC 


FAC+-0 


FCMPR 


FPR 


MEM 


REG A 


FAC f MEM 


FDIV 


FPR 


MEM 


FAC 


FAC <- FAC/MEM 


FERROR 


FPR 


— 


REGS H,L 


REGS H,L TERROR 


FIXSD 


FPR 


MEM 


MEM 


MEMint <- FACfp 


FLOAD 


FPR 


MEM 


FAC 


FAC +- MEM 


FLTDS 


FPR 


MEM 


FAC 


FACfp «- MEMim 


FMUL 


FPR 


MEM 


FAC 


FAC «- FAC • MEM 


FNEG 


FPR 


~ 


FAC 


0^0 

otherwise, change sign 

of FAC 


FQFB2D 


MEM 


Control 
Block 


MEM 


MEM d ec*-FACbin 


FQFD2B 


FPR 


Control 
Block 


FAC 


FACbin^-MEMdec 


FRESET 


B(0) = Error 


User 


FPR 


ERROR <- B,C 




Handler Bit 


Error 




ERR HAND ADDR <- D,E 




C = Error Field 


Handler 








Initialization 








FSET 


B(0) = Error 


User 


FPR 


FAC^O 




Handler Bit 


Error 




ERROR <- B,C 




C = Error Field 


Handler 




ERR HAND ADDR <- D,E 




Initialization 






STATUS *- 


FSTAT 


FPR 


— 


REG A 


REG A «- STATUS 


FSTOR 


FPR 


MEM 


MEM 


MEM <- FAC 


FSUB 


FPR 


MEM 


FAC 


FAC <- FAC -MEM 


FZTST 


FPR 


— 


REG A 


FAC fO 
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Error Handling 



Table C-2 lists the error codes set by the FPAL procedures. As was described in Chapter 4, 
when an error occurs a code is placed in the B-C register pair indicating which procedure 
was running when the error was detected, error codes are set in the Status and Error fields 
of the FPR, and the error handler is called. The default error handler may perform 
additional operations depending on which procedure was executing. 



In the case of an invalid number in the FAC, the Status field error bits and the IE bit are 
'preset' by FLO AD, rather than being set by an arithmetic procedure. The call to 
FERHND comes from the arithmetic procedure, however. 

Table C-2. FPAL Error-Handling Summary 



FPAL 
Procedure 


B,C 


Status 


Error Bit 


Error Type 


FERHND Action 


FABS 


9 


UUUUU101 


IE 


FAC invalid. 


No operation; FERHND returns. 


FADD 


1 


UUUUU011 

UUUUU100 

UUUUU101 
UUUUU110 


OE 

UE 

IE 
IE 


Overflow. 

Underflow. 

FAC invalid. 

Invalid no. in memory. 


Set FAC to largest/smallest no. 
(overflow positive/negative); 
Status = UUUUUOOO. 

FAC set to 0. 

Status set to UUUUUOOO. 

No operation ; FERHND returns. 
No operation; FERHND returns. 


FCLR 


- 


— 


— 


No error conditions. 


— 


FCMPR 


6 


00OUU101 
O0OUU1 10 


IE 
IE 


FAC invalid. 

Invalid no. in memory. 


If operands identical. Status set to 
100UU101; otherwise Status is 

000UU101. 


FDIV 


4 


UUUUU001 

Others same 
as FADD. 


ZE 

Others same 
as FADD. 


Attempted division by 0. 
Same as FADD. 


FAC set to invalid number (s=0, 
e=l,f=0); Status set to 
UUUUU101;IEset. 

Same as FADD. 


FERROR 


- 


— 


— 


No error conditions. 


— 


FIXSD 


5 


UUUUU011 
UUUUUI01 


OE 
IE 


FAC no. too large. 

FAC invalid; integer 
stored is undefined 


Set memory to largest/smallest 
integer from FAC (overflow posi- 
tive/negative); Status = UUUUUOOO. 
No operation; FERHND returns. 


FLO AD 


- 


UUUUU101 


IE 


Number loaded into 
FAC is invalid. 


Not called. 


FLTDS 


- 


— 


— 


No error conditions. 


— 


FMUL 


3 


Same as 
FADD. 


Same as FADD. 


Same as FADD. 


Same as FADD. 


FNEG 


8 


UUUUU101 


IE 


FAC invalid. 


No operation; FERHND returns. 


FQFB2D 




UUUUU101 


IE 


FAC invalid. 




«iot called. Decimal record sign and 

D2 . . . D n set to* 

D, set to: 

+'ifFAC = +INF 

-Mf FAC - -INF 

?MfFAC = IND 

0' if FAC = -0 

*' all other invalids. 


FQFD2B 
FRESET 


- 


— 


-- 


No error conditions. 

None, but if MA, UO or 
OO bits = 1, results are 
undefined. 


-- 


FSET 


- 


— 


— 


Same as FRESET. 


— 


FSTAT 
FSTOR 


- 


— 


— 


No error conditions. 
No error conditions. 


— 


FSUB 


2 


Same as 
FADD. 


Same as FADD. 


Same as FADD. 


Same as FADD. 


FZTST 


7 


UUUUU101 


IE 


FAC invalid. 


No operation; FERHND returns. 
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Procedure Sizes 

Table C-3 summarizes size information for each FPAL procedure (in bytes). These 
absolute figures must be read against the context of FPAL operation as a whole, however, 
as detailed in the notes following this table. 

Table C-3. FPAL Procedure Sizes 



FPAL 
Procedure 


Bytes 


Subroutines 
Linked 


FABS 


36 


None 


FADD/FSUB 


463 


FCLR, FLO AD, FNEG, 
Support Routines 


FCLR 


21 


None 


FCMPR 


159 


Support Routines 


FDIV 


342 


Support Routines 


FERHND 


227 


FCLR, FLOAD 


FERROR 


10 


None 


FIXSD 


178 


None 


FLO AD 


88 


None 


FLTDS 


139 


FCLR, Support Routines 


FMUL 


404 


FCLR, Support Routines 


FNEG 


43 


None 


FQFB2D 


1585 


None 


FQFD2B 


725 


None 


FRESET 


40 


FERHND 


FSET 


57 


FERHND 


FSTAT 


1 


None 


FSTOR 


35 


None 


FZTST 


56 


None 


Support Routines 


259 


None 
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NOTES 

1. FSET must be used. Since it links in FERHND and FERHND links in FCLR and 
FLO AD, the total space requirement for FSET is 

FSET 57 

FERHND 227 

FCLR 21 

FLOAD _88 

393 bytes 

Since FRESET links in the same subroutines as FSET, they need not be counted 
again if FRESET is specified. 

FRESET 40 bytes 

2. A number of arithmetic procedures (FADD, FSUB, FDIV, FMUL, FCMPR, and 
FLTDS) link in a set of FPAL support routines. These routines need be linked and 
counted only once. 

Support Routines 259 bytes 

3. Calling FADD or FSUB causes both subroutines to be linked into your program. 
These subroutines link in FCLR, FLOAD, and the support routines — all of which 
have been previously counted. In addition, FNEG is linked, so that the additional 
space requirement for FADD/FSUB becomes 

FADD/FSUB 463 
FNEG _43 

506 bytes 

4. FDIV and FCMPR link in only the FPAL support routines. FMUL and FLTDS link 
in only the support routines and FCLR, both of which are already counted. Thus, 
only the absolute count for these procedures need be considered. 

5. FABS, FERROR, FIXSD, FSTAT, FSTOR, and FZTST link in no other procedures 
and only their absolute sizes need be considered. 

6. FCLR, FERHND, FLOAD, and FNEG are all linked by other subroutines and 
included in those subroutines' total byte count. They need not be counted again if 
referenced separately. 

Example : 

To compute I = FIXSD(A*B), you must allow space for: 

FSET 393 
FERHND 

FLOAD 

FMUL 404 

FCLR 

Support Routines 259 

FIXSD 178 

1234 bytes 
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Procedure Timing 



When computing execution speeds of FPAL procedures, you must be even more wary 
of absolutes than when computing size requirements. We could list the following times 
for the basic arithmetic operations: 



FADD 


0.7 milli 


FSUB 


0.7 


FMUL 


1.5 


FDIV 


3.6 


FCMPR 


0.3 



These figures are only approximations, however, and the actual figure for a given opera- 
tion depends on the operands involved. The following examples illustrate this point. 



Example 1 






Operand 1 : 
Operand 2: 


40000000H 
40000000H 






Procedure 


Avg. ms 




FADD 

FSUB 

FMUL 

FDIV 

FCMPR 


0.69 
0.79 
1.48 
3.79 
0.33 


Example 2 






Operand 1 : 
Operand 2: 


41C80000H 
41F00000H 






Procedure 


Avg. ms 




FADD 

FSUB 

FMUL 

FDIV 

FCMPR 


0.70 
0.83 
1.43 
3.60 
0.28 


Example 3 






Operand 1 : 
Operand 2: 


41C8FF00H 
41F0F0FFH 






Procedure 


Avg. ms 




FADD 

FSUB 

FMUL 

FDIV 

FCMPR 


0.66 
0.83 
1.54 
3.60 
0.28 
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Example 4 






Operand 1 : 


3FFFFFFFFH 


Operand 2: 


3FFFFFFFEH 




Procedure 


Avg. ms 




FADD 


0.65 




FSUB 


1.62 




FMUL 


1.66 




FDIV 


3.61 




FCMPR 


0.32 



NOTE 

The only reason FSUB appears to take longer than 
FADD in these examples is that all operands are 
positive. On the average, both will take the same time 
since they are simply different entry points into the 
same subroutine. 
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